10 PRINT"SPELLING BEE
100 [143] SPELLING BEE
110 W[178]75
120 [134] W$(W),S(20)
130 [151]53280,4: [151]53281,1:[153]"LOADSTOP":[153]
140 [153] "WELCOME PAULINE'S SPELLING BEE."
150 [153] : [153] "YOU WILL SEE THE BEE FLY ACROSS THE"
160 [153] "SCREEN,LEAVING LETTERS AS IT GOES."
170 [153] : [153] "THESE LETTERS ARE OF A SCRAMBLED WORD."
180 [153] "YOU MUST UNSCRAMBLE THE WORD AND ENTER"
190 [153] "THE CORRECT SPELLING TO RECIEVE POINTS.":[153]
210 [153] : [153] "GOOD LUCK.":[153]
220 B$(1)[178]"      (null)  (null)(null)"
230 B$(2)[178]"      STOP SYS STOP SYSWAITSTOP(null)"
240 B$(3)[178]"    STOP SYS STOP SYS STOP SYSWAIT"
250 B$(4)[178]"STOP   <STOP SYS STOP SYS STOP SYSWAITSTOP="
260 B$(5)[178]"STOP      ;;"
270 D$[178]"":P$[178]""
280 [129] X[178]1 [164] W:[135] W$(X):[130]
290 [153] : [153] "HIT ANY KEY TO START."
300 [161] Q$: [139] Q$[178]"" [167] 300
310 T[178] 0:S[178]0
320 [129] X[178]1 [164] 10
330 A[178] [181] ( [187] (8)[172]W)[170]1:W$[178]W$(A):S$[178]""
340 L[178] [195] (W$): [129] Y[178]1 [164] L:S(Y)[178]0:[130] Y
350 [129] Y[178]1 [164] [195] (W$)
360 K[178] [181] ( [187] (3)[172]L)[170]1:[139] S(K)[178]1 [167] 360
370 S$[178]S$[170][202] (W$,K,1):S(K)[178]1:[130] Y
380 [139] S$[178]W$ [167] 340
390 [153] "LOADWORD #"X" SCORE="S
400 F[178]1:[129] Y[178]1 [164] 28:B$[178][200] (P$,Y)
410 [139] [195] (B$)[177]17 [175] F[179]L[170]1 [167] [153] D$;B$;"CMDCMD"[202] (S$,F,1):F[178]F[170]1
420 [153] D$
430 [129] Z[178]1 [164] 5:[153] B$;B$(Z):[130] Z
440 [129] T[178]1 [164] 49:[130] T,Y
450 [153] D$
460 [153] D$;""
470 [133] "ENTER CORRECT SPELLING";C$:[153]
480 [139] C$[178]W$ [167] [153] [163] 13)"THAT IS CORRECT!":S[178]S[170]125:[137] 510
490 [153] [163] 10)"WRONG, IT WAS "W$"."
500 [129] T[178]1 [164] 1000:[130] T
510 [129] T[178]1 [164] 2000:[130] T
520 [130] X
530 [153] "LOAD":[153]
540 [139] S[177]900 [167] [153] "YOU WIN THE SPELLING BEE!":[137] 580
550 [139] S[177]800 [167] [153] "VERY WELL DONE.":[137] 580
560 [139] S[177]700 [167] [153] "NOT BAD.":[137] 580
570 [153] "YOU NEED PRACTICE."
580 [153] : [133] "PLAY AGAIN";Q$
590 [139] [200] (Q$,1)[178]"Y" [167] 290
601 [131] CATALOG,CATFISH,FRUIT,FIRST,MONEY,PARTY,RECALL,SCORE,TROPHY
602 [131] BIRTH,BROOM,CHURCH,CUSHION,FROST,PICKLE,GREET,ROCK
603 [131] MODEL,MONKEY,REDEEM,RIFLE,SAUCE,SCARF,FACE,EXTRA,GARDEN,DIARY
605 [131] CLAIM,PRIDE,RETURN,MONDAY,CARPET,WENT,CANDY,ONION
606 [131] PARADISE,HEAT,SEVEN,CLEAN,TOOL,SAMPLE,OTHER,FRESH
607 [131] DOLLAR,SORRY,SURE,WATCH,EIGHT,GLASSES,WELCOME
608 [131] DETAIL,BLEND,TRUCK,CRUSH,LITTLE,DAMAGE,CLUB,CLEAR
609 [131] SMELL,WRECK,STICK,DRIVE,CURVE,URGE,RIDDLE
610 [131] DANCE,POKE,TEST,WASH,SIMPLE,BEND,SPRING,BALLOON,TODAY,GATE